

%plot pressure frequency data
axes(handles.axes13)
plot(0:length(P_Harmonics(:,2))-1,P_Harmonics(:,2), '-o')
xlabel('Harmonic')
ylabel('Modulus (dynes/cm^2)')
title('Pressure Moduli')

%plot pressure waveform data
axes(handles.axes15)
plot(t,ydata,'-b','LineWidth',2)
hold on
plot(z1,y,'-*r','LineWidth',2)
xlabel('Time');ylabel('Pressure Magnitude (dynes/cm^2)')
hold on
inv_Y=ifftn(Yfft);
ninv=L-1;Tp=Tp -delta_t;
plot(0:Tp/ninv:(ninv-1)*Tp/ninv,inv_Y(1:floor(L-1)),'*k')
title('Input Pressure Wave: Fourier Expansion')
hold off